www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8（全功能，无限制，完全开源）/Deal_baoming.asp

    <!--#include file="ku_inc/Ku_config.asp"-->
<!--#include file="Ku_conn.asp"-->
<!--#include file="Ku_inc/ku_sql.asp"-->
<!--#include file="Ku_inc/Inc.asp"-->
<!--#include file="Ku_inc/Ku_md5.asp"-->
<%
id=request.querystring("id")
%>

<%
user=Request.Cookies("Ku_USER")("User_Name")
if Request.Cookies("Ku_USER")("User_Name")="" then
    Response.Write "<script>alert(""只有登录会员才能报名参加此拼客活动！"");location.href=""Gu_pinke.asp"";</script>"
else

set rs=server.CreateObject("adodb.recordset")
sql="select * from Gu_baoming where username='"&user&"' and pinkeid="&id
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("pinkeid")=id
rs("username")=Request.Cookies("Ku_USER")("User_Name")
rs("addtime")=now()
rs.update

'增加圈内人数
set prs=server.CreateObject("adodb.recordset")
psql="select * from Gu_pinke where id="&id
prs.open psql,conn,1,3

prs("hits")=prs("hits")+1
prs.update
Response.Write "<script language='javascript'>alert('恭喜您!您已成功报名此拼客活动!');</script>" 
%>
<meta http-equiv="refresh" content="1; url=Gu_showpinke.asp?guxing=<%=id%>">
<%
response.End
else
Response.Write "<script language='javascript'>alert('您已报过名了，无需再次报名！');</script>" 
%>
<meta http-equiv="refresh" content="1; url=Gu_showpinke.asp?guxing=<%=id%>">
<%end if%>
<%end if%>